home *** CD-ROM | disk | FTP | other *** search
/ Inside the White House / Inside the White House.iso / export.dir / 00007.ls < prev    next >
Encoding:
Text File  |  1995-07-11  |  199 b   |  12 lines
  1. on mouseDown
  2.   global rValue
  3.   if pushButton() then
  4.     set rValue to "ExpAll"
  5.     if exportText(field "theText") then
  6.       tell the stage
  7.         forgetExp()
  8.       end tell
  9.     end if
  10.   end if
  11. end
  12.